home *** CD-ROM | disk | FTP | other *** search
/ Komputer for Alle 1998 #6 / 1998 CD 6 (Gul).iso / shared.dir / 01213_Play Through.ls < prev    next >
Encoding:
Text File  |  1996-02-08  |  413 b   |  16 lines
  1. on mouseDown
  2.   global gWaitForUser
  3.   puppetTransition(0)
  4.   set lver to the mouseH
  5.   puppetSprite(the clickOn, 1)
  6.   set lHalf to the width of sprite the clickOn / 2
  7.   set lHalfPosition to the left of sprite the clickOn + lHalf
  8.   if lver < lHalfPosition then
  9.     nothing()
  10.   else
  11.     set the castNum of sprite the clickOn to the number of cast "Wait For Me"
  12.     updateStage()
  13.     set gWaitForUser to 0
  14.   end if
  15. end
  16.